From: Glenn Morris <rgm@gnu.org>
Date: Thu, 30 Jun 2011 02:51:27 +0000 (-0700)
Subject: * lisp/ses.el (row, col): Declare dynamic variables honestly.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~3252
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=a330ddcca72c89e9039f7d79418af0dbf716107d;p=emacs.git

* lisp/ses.el (row, col): Declare dynamic variables honestly.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fb5d9813764..303175fff98 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2011-06-30  Glenn Morris  <rgm@gnu.org>
 
+	* ses.el (row, col): Declare dynamic variables honestly.
+
 	* textmodes/reftex-parse.el (index-tags): Declare.
 
 2011-06-30  Chong Yidong  <cyd@stupidchicken.com>
diff --git a/lisp/ses.el b/lisp/ses.el
index a0df6a5e2cc..9b2048eae83 100644
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -3348,10 +3348,8 @@ TEST is evaluated."
 ;; These functions use the variables 'row' and 'col' that are dynamically bound
 ;; by ses-print-cell.  We define these variables at compile-time to make the
 ;; compiler happy.
-(eval-when-compile
-  (dolist (x '(row col))
-    (make-local-variable x)
-    (set x nil)))
+(defvar row)
+(defvar col)
 
 (defun ses-center (value &optional span fill)
   "Print VALUE, centered within column.  FILL is the fill character for